/// Prepare ex-combatant panel data for analysis

use  "~/Dropbox/Replication_MVC/Datasets/datasets_analysis/ACR_LB_Muni5.dta", clear

xtset id year
sort id year

// 1. Generate captures variable used in paper

g NdeCapturasCrucePONAL_lagged = l.NdeCapturasCrucePONAL
g diffcaptures = NdeCapturasCrucePONAL - NdeCapturasCrucePONAL_lagged

g NdeCapturasenFlagrancia_lagged = l.NdeCapturasenFlagrancia
g diffcaptures_f = NdeCapturasenFlagrancia- NdeCapturasenFlagrancia_lagged

// 2. Generate wartime groups (same subunit and same rank/position) 

egen wartimenetwork = group(Exestructura  CARGO), label

// 3. Generate Treatment varibles

* Log prices
gen log_gold_price=log(gold_price)
gen log_oil_price=log(oil_price)

* Economic shock=. Interaction intensity*price
gen gold_shock= oro_sin_titulo*log_gold_price
gen oil_shock= pipelen2000*log_oil_price

* Define mean value of economic shock for the group
sort wartimenetwork
by wartimenetwork: egen mean_gold_production=mean(oro_sin_titulo)
gen mean_gold_shock=mean_gold_production*log_gold_price

* Standardize 
sum gold_shock
generate gold_shock_r = (gold_shock-r(mean))/r(sd)

sum mean_gold_shock
generate mean_gold_shock_r = (mean_gold_shock-r(mean))/r(sd)


** create/rename control variables
bysort id (year): gen time_t = _n
gen black = (Grupoetnico=="Afrocolombiano")
gen indigenous = (Grupoetnico=="Indigena")
gen female = (Sexo=="Femenino")
gen age = Edad

*** Create additional outcomes varibales: 'moved' 'move to gold' 'move to oil'
g origmunlaged = l.origmun
gen moved= origmunlaged-origmun
replace moved=1 if moved!=0 & year!=2013
gen mun_origen_oro=l.oro_sin_titulo
gen moved_to_gold=1 if moved==1 & mun_origen_oro==0 & oro_sin_titulo>0
replace moved_to_gold=0 if moved_to_gold!=1
gen previous_goldshock= l.mean_gold_shock_r

*** Define type of crimes
gen crimetype=DelitoultimaCaptura
replace crimetype="." if diffcaptures<=0 | diffcaptures==.

replace crimetype= "Homicidio" if DelitoultimaCaptura=="ARTiCULO 103. HOMICIDIO"  
replace crimetype= "Homicidio" if DelitoultimaCaptura=="ARTiCULO 106. HOMICIDIO POR PIEDAD"  
replace crimetype= "Lesiones Personales" if DelitoultimaCaptura=="ARTiCULO 111. LESIONES PERSONALES"  
replace crimetype= "Homicidio" if DelitoultimaCaptura=="ARTiCULO 135. HOMICIDIO EN PERSONA PROTEGIDA."  
replace crimetype= "Acoso sexual" if DelitoultimaCaptura=="ARTiCULO 208. ACCESO CARNAL ABUSIVO CON MENOR DE 14 AÑOS"  
replace crimetype= "Hurto" if DelitoultimaCaptura=="ARTiCULO 189. VIOLACIoN DE HABITACIoN AJENA."  
replace crimetype= "Acoso sexual" if DelitoultimaCaptura=="ARTiCULO 209. ACTOS SEXUALES CON MENOR DE 14 AÑOS"  
replace crimetype= "Acoso sexual" if DelitoultimaCaptura=="ARTiCULO 210 A. ACOSO SEXUAL"  
replace crimetype= "Violencia Intrafamiliar" if DelitoultimaCaptura=="ARTiCULO 229. VIOLENCIA INTRAFAMILIAR"  
replace crimetype= "Inansistencia Alimentaria" if DelitoultimaCaptura=="ARTiCULO 233. INASISTENCIA ALIMENTARIA."  
replace crimetype= "Hurto" if DelitoultimaCaptura=="ARTiCULO 239. HURTO PERSONAS"  
replace crimetype= "Extorsion" if DelitoultimaCaptura=="ARTiCULO 244. EXTORSIoN"  
replace crimetype= "Uso ilegal recursos naturales" if DelitoultimaCaptura=="ARTiCULO 256. DEFRAUDACIoN DE FLUIDOS"  
replace crimetype= "Dano en bien ajeno" if DelitoultimaCaptura=="ARTiCULO 265. DAÑO EN BIEN AJENO"  
replace crimetype= "Uso documento falso" if DelitoultimaCaptura=="ARTiCULO 286. FALSEDAD IDEOLoGICA EN DOCUMENTO PuBLICO"  
replace crimetype= "Uso documento falso" if DelitoultimaCaptura=="ARTiCULO 291. USO DE DOCUMENTO FALSO"  
replace crimetype= "Concierto para delinquir" if DelitoultimaCaptura=="ARTiCULO 312. EJERCICIO ILiCITO DE ACTIVIDAD MONOPOLiSTICA DE ARBITRIO RENTiSTICO"  
replace crimetype= "Uso ilegal recursos naturales" if DelitoultimaCaptura=="ARTiCULO 320-1. FAVORECIMIENTO DE CONTRABANDO DE HIDROCARBUROS"  
replace crimetype= "Uso ilegal recursos naturales" if DelitoultimaCaptura=="ARTiCULO 328. ILiCITO APROVECHAMIENTO DE LOS RECURSOS NATURALES RENOVABLES"  
replace crimetype= "Uso ilegal recursos naturales" if DelitoultimaCaptura=="ARTiCULO 332. CONTAMINACIoN AMBIENTAL"  
replace crimetype= "Maltrato Animal" if DelitoultimaCaptura=="ARTiCULO 336. CAZA ILEGAL"  
replace crimetype= "Uso ilegal recursos naturales" if DelitoultimaCaptura=="ARTiCULO 338. EXPLOTACIoN ILiCITA DE YACIMIENTO MINERO Y OTROS MATERIALES"  
replace crimetype= "Maltrato Animal" if DelitoultimaCaptura=="ARTiCULO 339A. MALTRATO ANIMAL"  
replace crimetype= "Concierto para delinquir" if DelitoultimaCaptura=="ARTiCULO 340. CONCIERTO PARA DELINQUIR"  
replace crimetype= "Concierto para delinquir" if DelitoultimaCaptura=="ARTiCULO 342. CONCIERTO PARA DELINQUIR (CIRCUNSTANCIAS DE AGRAVACIoN)"  
replace crimetype= "Otros" if DelitoultimaCaptura=="ARTiCULO 350.  INCENDIO"  
replace crimetype= "Concierto para delinquir" if DelitoultimaCaptura=="ARTiCULO 397. PECULADO POR APROPIACIoN"  
replace crimetype= "Concierto para delinquir" if DelitoultimaCaptura=="ARTiCULO 407. COHECHO POR DAR U OFRECER"  
replace crimetype= "Sedicion" if DelitoultimaCaptura=="ARTiCULO 429. VIOLENCIA CONTRA SERVIDOR PuBLICO"  
replace crimetype= "Concierto para delinquir" if DelitoultimaCaptura=="ARTiCULO 447. RECEPTACIoN"  
replace crimetype= "Asonada" if DelitoultimaCaptura=="ARTiCULO 469. ASONADA"  
replace crimetype= "Rebelion" if DelitoultimaCaptura=="ARTiCULO 467. REBELIoN"  
replace crimetype= "Otros" if DelitoultimaCaptura=="ARTiCULO 448. FUGA DE PRESOS"  
replace crimetype=	"Negligent injuries car accident"	 if DelitoultimaCaptura==	"ARTiCULO 120. LESIONES CULPOSAS ( EN ACCIDENTE DE TRANSITO )"
replace crimetype=	"Amenaza" if DelitoultimaCaptura==	"ARTiCULO 226. INJURIA POR ViAS DE HECHO"
replace crimetype=	"Hurto"	if DelitoultimaCaptura==	"ARTiCULO 239. HURTO ABIGEATO"
replace crimetype=	"Hurto"	if DelitoultimaCaptura==	"ARTiCULO 239. HURTO ENTIDADES COMERCIALES"
replace crimetype=	"Hurto"	if DelitoultimaCaptura==	"ARTiCULO 239. HURTO MOTOCICLETAS"
replace crimetype=	"Hurto"	if DelitoultimaCaptura==	"ARTiCULO 239. HURTO RESIDENCIAS"
replace crimetype=	"Fraude"	if DelitoultimaCaptura==	"ARTiCULO 246. ESTAFA"
replace crimetype=	"Fraude"	if DelitoultimaCaptura==	"ARTiCULO 454. FRAUDE A RESOLUCIoN JUDICIAL O ADMINISTRATIVA DE POLICiA"
replace crimetype=	"Homicidio"	if DelitoultimaCaptura==	"HOMICIDIO EN PERSONA PROTEGIDA"
replace crimetype= "Fabricacion, trafico, porte o tenencia de armas de fuego, accesorios, partes o municiones" if DelitoultimaCaptura=="ARTiCULO 365. FABRICACIoN, TRaFICO, PORTE O TENENCIA DE ARMAS DE FUEGO,ACCESORIOS, PARTES O MUNICIONES"  
replace crimetype= "Fabricacion, trafico y porte de armas, municiones de uso restringido, de uso privativo de las Fuerzas Armadas" if DelitoultimaCaptura=="ARTiCULO 366. FABRICACIoN, TRaFICO Y PORTE DE ARMAS, MUNICIONES DE USO RESTRINGIDO, DE USO PRIVATIVO DE LAS FUERZAS ARMADAS O EXPLOSIVOS"  
replace crimetype= "Fabricacion, trafico y porte de armas, municiones de uso restringido, de uso privativo de las Fuerzas Armadas" if DelitoultimaCaptura=="ARTiCULO 346. UTILIZACIoN ILEGAL DE UNIFORMES E INSIGNIAS"  
replace crimetype= "Trafico, fabricacion o porte de estupefacientes" if DelitoultimaCaptura=="ARTiCULO 376. TRaFICO, FABRICACIoN O PORTE DE ESTUPEFACIENTES"  
gen crimetype2 = ustrto(ustrnormalize(crimetype, "nfd"), "ascii", 2)	
replace crimetype2= "Fraude" if crimetype2=="Estafa"
replace crimetype2= "Fabricacion, trafico, porte o tenencia de armas de fuego, accesorios, partes o municiones"	if crimetype2==	"Fabricacin, trafico, porte o tenencia de armas de fuego, accesorios, partes o municiones"
replace crimetype2= "Fabricacion, trafico, porte o tenencia de armas de fuego, accesorios, partes o municiones"	if crimetype2==	"Fabricacin, trfico, porte o tenencia de armas de fuego, accesorios, partes o municiones"
replace crimetype2= "Fabricacion, trafico y porte de armas, municiones de uso restringido, de uso privativo de las Fuerzas Armadas" if crimetype2==	"Fabricacin, trafico y porte de armas, municiones de uso restringido, de uso privativo de las Fuerzas Armadas"
replace crimetype2= "Fabricacion, trafico y porte de armas, municiones de uso restringido, de uso privativo de las Fuerzas Armadas" if crimetype2==	"Fabricacin, trfico y porte de armas, municiones de uso restringido, de uso privativo de las Fuerzas Armadas"
replace crimetype2= "Trafico, fabricacion o porte de estupefacientes" if crimetype2=="Trafico, fabricacin o porte de estupefacientes"
replace crimetype2= "Trafico, fabricacion o porte de estupefacientes" if crimetype2== "Trfico, fabricacin o porte de estupefacientes"

gen Type_of_Crime= crimetype2
replace Type_of_Crime="Other" if Type_of_Crime=="Otros"
replace Type_of_Crime="Sexual Harssment" if Type_of_Crime=="Acoso sexual"
replace Type_of_Crime="Threat" if Type_of_Crime=="Amenazas"
replace Type_of_Crime="Threat" if Type_of_Crime=="Amenaza"
replace Type_of_Crime="Fraud" if Type_of_Crime=="Fraude"
replace Type_of_Crime="Organized Crime" if Type_of_Crime=="Concierto para delinquir"
replace Type_of_Crime="Organized Crime" if Type_of_Crime=="Asonada"
replace Type_of_Crime="Forced disappearance" if Type_of_Crime=="Desaparacion forzada"
replace Type_of_Crime="Fraud" if Type_of_Crime=="Estafa"
replace Type_of_Crime="Animal abuse"  if Type_of_Crime=="Maltrato Animal"
replace Type_of_Crime="Household food assitance" if Type_of_Crime=="Inansistencia Alimentaria"
replace Type_of_Crime="Extortion" if Type_of_Crime=="Extorsin"
replace Type_of_Crime="Extortion" if Type_of_Crime=="Extorsion"
replace Type_of_Crime="Illegal possession and trafficking of Military arms and ammunition" if Type_of_Crime=="Fabricacin, trafico y porte de armas, municiones de uso restringido, de uso privativo de las Fuerzas Armadas"
replace Type_of_Crime="Illegal possession and trafficking of Military arms and ammunition" if Type_of_Crime=="Fabricacion, trafico y porte de armas, municiones de uso restringido, de uso privativo de las Fuerzas Armadas"
replace Type_of_Crime="Illegal arms possession, trafficking or production" if Type_of_Crime=="Fabricacin, trafico, porte o tenencia de armas de fuego, accesorios, partes o municiones"
replace Type_of_Crime="Illegal arms possession, trafficking or production" if Type_of_Crime=="Fabricacion, trafico, porte o tenencia de armas de fuego, accesorios, partes o municiones"
replace Type_of_Crime="Homicide" if Type_of_Crime=="HOMICIDIO EN PERSONA PROTEGIDA"
replace Type_of_Crime="Homicide" if Type_of_Crime=="Homicidio"
replace Type_of_Crime="Theft" if Type_of_Crime=="Hurto"
replace Type_of_Crime="Personal assault" if Type_of_Crime=="Lesiones Personales"
replace Type_of_Crime="Property assault" if Type_of_Crime=="Dano en bien ajeno"
replace Type_of_Crime="Rebellion" if Type_of_Crime=="Rebelin"
replace Type_of_Crime="Rebellion" if Type_of_Crime=="Rebelion"
replace Type_of_Crime="Kidnapping" if Type_of_Crime=="Secuestro"
replace Type_of_Crime="Attack against authorities" if Type_of_Crime=="Sedicin"
replace Type_of_Crime="Attack against authorities" if Type_of_Crime=="Sedicion"
replace Type_of_Crime="Terrorism" if Type_of_Crime=="Terrorismo"
replace Type_of_Crime="Drug possession, production or trafficking" if  Type_of_Crime=="Trafico, fabricacin o porte de estupefacientes"
replace Type_of_Crime="Drug possession, production or trafficking" if  Type_of_Crime=="Trafico, fabricacion o porte de estupefacientes"
replace Type_of_Crime="Use false identification" if Type_of_Crime=="Uso documento falso"
replace Type_of_Crime="Illegal use natural resources" if Type_of_Crime=="Uso ilegal recursos naturales"
replace Type_of_Crime="Domestic violence" if Type_of_Crime=="Violencia Intrafamiliar"

save "~/Dropbox/Replication_MVC/Datasets/datasets_analysis/panel_excombatientes.dta", replace

label variable codigoespejo "Codigo Espejo"
label variable CARGO "Cargo"
label variable CARGO_ALTO "Cargo Alto"
label variable origmun "Orig Mun"
label variable origmuncaptura "Orig Mun Captura"
label variable educationfather "Education Father"
label variable educationmother "Education Mother"
label variable agejoinedgroup "Age Joined Group"
label variable yearseducation "Years Education"
label variable Educationyears "Education Years"
label variable indicedeReintegracion "Indice de Reintegracion"
label variable estratoeconomico "Estrato Economico"
label variable year "Year"
label variable oil_price "Oil Price"
label variable gold_price "Gold Price"
label variable crimetype "Crime Type"
label variable crimetype2 "Crime Type2"
label variable Type_of_Crime "Type of Crime"
label variable edadingreso "Edad ingreso"

label variable NdeCapturasCrucePONAL_lagged "Number of Captures Cruce PONAL Lagged"
label variable NdeCapturasenFlagrancia_lagged "Number of Captures en Flagrancia Lagged"
labe variable diffcaptures "Number of captures"
labe variable diffcaptures_f "Number of Flagrancia captures"
label variable log_gold_price "Log Gold Price"
label variable log_oil_price "Log Oil Price"
label variable gold_shock "Gold Shock"
label variable oil_shock "Oil Shock"
label variable mean_gold_production "Mean Gold Production"
label variable mean_gold_shock "Mean Gold Shock"
label variable gold_shock_r "Gold Shock standarized"
label variable mean_gold_shock_r "Mean Gold Shock standarized"
label variable time_t "Time T"
label variable black "Black"
label variable indigenous "Indigenous"
label variable female "Female"
label variable age "Age"
label variable origmunlaged "Orig Mun Laged"
label variable moved "Moved"
label variable mun_origen_oro "Mun Origen Oro"
label variable moved_to_gold "Moved to Gold"
label variable previous_goldshock "Previous Gold Shock"
label variable region "Region"

label variable oro_sin_titulo "Number of illegal mines"
label variable pipelen2000 "Pipelines"

label variable captu_BACRIM_cesed "Capturas Bacrim"
label variable capturas_MD "Total capturas MinDefensa" 
label variable id "codigo individuo"

label variable NdeHijos "N de hijos"
label variable Grupoetnico "Grupo etnico"
label variable NdeCapturasCrucePONAL "N de Capturas Cruce PONAL"
label variable NdeCapturasenFlagrancia "N de Capturas en Flagrancia"
label variable Fechaultimacaptura "Fecha ultima captura"

keep codigoespejo id year origmun ///
	 NdeCapturasCrucePONAL_lagged diffcaptures NdeCapturasenFlagrancia_lagged diffcaptures_f ///
	 wartimenetwork log_gold_price log_oil_price gold_shock oil_shock mean_gold_production ///
	 mean_gold_shock gold_shock_r mean_gold_shock_r time_t black indigenous female age ///
	 origmunlaged moved mun_origen_oro moved_to_gold previous_goldshock ///
	 /// muni_year
	 log_gold_price log_oil_price gold_shock oil_shock ///
	 oil_price gold_price pipelen2000 oro_sin_titulo captu_BACRIM_cesed capturas_MD ///
	 region oro_sin_titulo pipelen2000 paved_roads Longitude Latitude Surfacearea_sqkms_ ///
	 Elevation_abovesealevel Rainfall__mm_year_ codprovincia depto provincia municipio ///
	 gandina gcaribe gpacifica gorinoquia gamazonia pobl_tot disbogota pib_cons pobreza ///
	 gini discapital dismdo mercado_cercano distancia_mercado goldprod04 region born_diffmuni lrwmonkindinc1 /// 
	 /// linea base
	 NdeHijos  codigoespejo estadocivil Estrato ///
	 Cuálessuultimogradoescolar Otros_estudios  Enqueoficiosedesempeñaba Tienetrabajoactualmente ///
	 AquéedadentróalGAI  edadingre  CuántotiempoestuvoenelGAI  Nmonthsingroup  ///
	 CARGO CARGO_ALTO origmun educationfather educationmother agejoinedgroup ///
	 yearseducation Educationyears estratoeconomico  /// 
	 /// arn_police
	 ExGrupo  Edad ///
	 Grupoetnico  Sexo  Municipio Departamento ///
	 NdeCapturasCrucePONAL NdeCapturasenFlagrancia Fechaultimacaptura ///
	 CircunstanciadeultimaCaptura DelitoultimaCaptura DptodeultimaCaptura ///
	 MpiodeultimaCaptura PrivadodelalibertadCruceI EstadoCruceINPEC ///
	 TipodeReincidencia DelitoReincidencia origmuncaptura indicedeReintegracion ///
	 Exestructura Type_of_Crime NNovedadesdeRetornos AtendidoenelMesActual   ///
	 ndeacciones GrupoTerritorialAsignado
	 
order origmun 
order year
order codigoespejo
	 
xtset id year
sort id year

save "~/Dropbox/Replication_MVC/Datasets/datasets_analysis/panel_excombatientes.dta", replace


